Asymetrix Multimedia Toolbook 4.0 (CBT Edition)

home *** CD-ROM | disk | FTP | other *** search

/ Asymetrix Multimedia Toolbook 4.0 (CBT Edition) / Asymetric Multimedia Toolbook 4.0 (CBT Edition).iso / ctb40ap.z / MTCHOBJ.SPB (.txt) < prev next >

Wrap

Asymetrix ToolBook File | 1996-01-10 | 131KB | 2,376 lines

F 8 8 L *ClassTbl* *ClassEntry* *PTABLE* *WINDOWSEG* *ICONRESTAB* *ICONRESSEG* *ICONRES* Background *OBJTABLE* *IDTABLE* *NAMETAB* Rectangle Ellipse RoundedRectangle Polygon IrregularPolygon AngledLine Curve PaintObject Picture Group Stage Button Viewer ComboBox Field RecordField Hotword *RHOTWORD* *TbxBase* 8 bxBase* F 8 9 TB40HYP.SBK bxBase* FALSE wwwwww wz'www z'z"ww wwwwz wwwwww wwwwww wwwwww &File &Open Ctrl+O &Save Ctrl+S Save &As... saveas &Import... import &Export... export Print Set&up... printsetup &Print Pages... Ctrl+P printpages Prin&t Report... printreport Send &Mail... sendmail &Run... E&xit Alt+F4 &Edit &Undo Ctrl+Z Cu&t Ctrl+X &Copy Ctrl+C &Paste Ctrl+V paste C&lear Del clear &Select All Shift+F9 selectall S&elect Page Shift+F12 selectpage F&ind... F5 search Re&place... replace &Author F3 author &Text &Character... F6 character &Paragraph... F7 paragraph Plai&n plain &Bold Ctrl+B I&talic Ctrl+T italic Under&line Ctrl+L underline Stri&keout Ctrl+K strikeout S&uper/subscript super/subscript &Normal script normalscript Su&bscript subscript Su&perscript superscript &Show Hotwords F9 showhotwords &Page &Next Alt+Right P&revious Alt+Left previous &First Alt+Up first &Last Alt+Down &Back Shift+F2 &History... Ctrl+F2 history N&ew Page Ctrl+N newpage &Help &Contents F1 index &Search for Help On... glossary &Tutorial tutorial &How To Use Help usinghelp &Keyboard keyboard C&ommands commands &About ToolBook... abouttoolbook ASYM_WID_ANSWERS AddAnswer buttonclick startTime ASYM_WID_ANSWERS count enterPage startTime count startTime FALSE currentTime ASYM_Ticks count update UpdateThisPage update enterPage None specified false (None specified) feedback found ASYM_WID_DelayFeedback ASYM_GetString Disabled Enabled oAnsArray Immediate Feedback: %1 %2 Immediate Feedback x y 7wASYM_Container update ,"JdY propValue ,"JdY propValue theWeight ASYM_WID_ANSWERS propValue oansArray oansArray propValue leaveField ASYM_WID_ANSWERS oansArray propValue FixupWeights FBNavBook FBNavPage field buttonDoubleClick ,&H.& ,&H.& ,&H.& ,&H.& ,&H.& fldNavPg fldNavBk FBNavBook false this book OKmsg OKdestPg FBPlayText FBNavPage OKtxt fldOsMsg OKdestBk ASYM_GetString OKclip fldTxt fldClip FBSendMsg FBPlayClip g8BlankThisPage UpdateThisPage FBNavBook FBPlayText FBNavPage FBSendMsg FBPlayClip blankThisPage FBNavBook FBNavPage field buttonDoubleClick ,&H.& ,&H.& ,&H.& ,&H.& ,&H.& fldNavPg fldNavBk FBNavBook false this book OKmsg OKdestPg FBPlayText FBNavPage OKtxt fldOsMsg OKdestBk ASYM_GetString OKclip fldTxt fldClip FBSendMsg FBPlayClip g8BlankThisPage UpdateThisPage FBNavBook FBPlayText FBNavPage FBSendMsg FBPlayClip blankThisPage ClastSel leavePage ClastSel leaveBackground ClastSel ASYM_Reset ASYM_GetString DelayedFeedbackForMultiObjects d6fbArray All Incorrect HsupdateThisPage All Correct initFBArray Partially Correct ClastSel ClastSel enterPage background s_wid_targetObject P#ASYM_WID_SummaryFeedback initFBArray e6fbArray 7wASYM_Container propValue background Incorrect Correct Partially Correct e6fbArray 7wASYM_Container initFBArray d6fbArray s_wid_targetObject Q#ASYM_WID_SummaryFeedback propValue d6fbArray hitChar hitLine ClastSel ClastSel ASYM_itemOffset buttonDown d6fbArray lastSel toggleAnchor HsUpdateThisPage whatItem ClastSel g8blankThisPage buttonUp ClastSel enterBackground ,&H.& d6fbArray HsupdateThisPage e6fbArray updateCurrentAnswer FuupdateCurrentAnswer setTextFeedback FuupdateCurrentAnswer setMsgFeedback FuupdateCurrentAnswer setNavPage FuupdateCurrentAnswer this book GetString setNavBook FALSE WidgetHasElseAnswer WidgetHasMultipleAnswers .'+ +F oAnsArray ASYM_reset ASYM_reset ,&H.& propsRead FALSE ASYM_WID_Answers ListToTextLine ~\WidgetHasElseAnswer ASYM_WID_AnsArray false readObjProps <else> VWidgetHasMultipleAnswers oAnsArray mxAllowMultipleAnswer tb40dlg.dll s_wid_targetObject FASYM_WID_AutoScoreWeight autoAssignWeight enterBackground propsRead readObjProps enterPage oansArray autoAssignWeight oansArray fixupWeights propType propType field,recordfield,button,group,combobox s_wid_targetWindow s_wid_targetObject propType s_wid_targetWindow s_wid_targetObject oType propName propsRead propValue oType propName readObjProps .'+ +F ,&H.& propType object propType field,recordfield,button,group,combobox <self> afterEdit propType s_wid_targetWindow s_wid_targetObject setString oType propValue propName setString s_wid_targetObject propValue ASYM_WID_AnsArray s_wid_targetWindow ASYM_Reset ASYM_Q tbk_wid_name oAnsArray default oType propName propValue Cancel oansArray numCorrect oansArray numAnswers updateThisPage blankThisPage .'+ +F ShowCurrentTab Button buttonClick ShowCurrentTab _currentTab enterPage ShowCurrentTab _currentTab resizeTabs box black box grey hilite sized tabRow current Tab Edge _currentTab resizeTabs defBounds _currentTab ShowCurrentTab currentRow ArrangeRow 4ArrangeCheats resizeTabs V, #? V, #? \:resizeTabEdge defBounds tabEdge ArrangeRow cheat grey cheat white cheat black arrangeCheats white black resizeTabEdge ClastSel leavePage ClastSel leaveBackground ClastSel ASYM_Reset multiSelect feedback delayed feedback fixAnsArray oplastItem lastItem SingleSelect oansArray HsUpdateThisPage pgName general skipAllSpecifiedWarning ClastSel propValue g8BlankThisPage enterPage background s_wid_targetObject fixUpLine ASYM_WID_AnsArray oansArray oansArray 7wASYM_Container propValue ,"Jc" GUASYM_isNumber background 8fixupWeights s_wid_targetObject noStr The positive answer weights ASYM_WID_AnsArray ASYM_GetString yesStr autoAssignWeight don't add up to 100%. Redistribute automatically? oansArray 7wASYM_Container propValue w, #> w, #> ASYM_GetString All named objects on the page are already specified as answers. modal addAnswer dlgPage prepDlgCB Add an Answer group dlgCB2 subdialog No named objects were found on the page. fixUpLine matchTarget whatItem MatchTarget dlgCB yesStr oansArray skipAllSpecifiedWarning ASYM_ShowDialog skipAllSpecifiedWarning oansArray 8fixupWeights HsupdateThisPage Do you want to type in an object name? MatchSource matchSource addAnswer ASYM_GetString modal addAnswer Edit the Answer dlgPage prepDlgCB group dlgCB2 subdialog fixUpLine matchTarget whatItem MatchTarget dlgCB oansArray ASYM_ShowDialog oansArray 8fixupWeights MatchSource matchSource editAnswer background objList FALSE s_wid_TargetObject ListToTextLine [useObjectType Answers ASYM_itemOffset useObjectType s_wid_TargetWindow skipAllSpecifiedWarning whatName sortList ASYM_WID_Exclusive 7wASYM_Container prepDlgCB w, #> 8fixupWeights oplastItem Delete the pair: whatItem ASYM_GetString yesStr oansArray oansArray HsUpdateThisPage g8BlankThisPage deleteAnswer ,&H.& answer oansArray fixAnsArray whatItem editAnswer answers buttonDoubleClick multiSelect hitChar hitLine oansArray ClastSel ASYM_itemOffset buttonDown lastSel HsUpdateThisPage ClastSel oansArray g8blankThisPage buttonUp ClastSel enterBackground fixupLine buttonclick AddAnswer "ASYM_WID_ANSWERS" notifyAfter = BLACK startTime = NULL mode count = ASYM_Ticks() currentTime = + 200 = LIGHTGRAY + 200 = FALSE notifyAfter UpdateThisPage selLines, AnsArray[][] Hreference update notifyBefore LOCAL FBArray[][] WORD i, j par1, par2 B"ASYM_WID_DelayFeedback"\ "feedback" ASYM_Container( T = ASYM_GetString("Enabled") found = ss = n = dimensions( j >= 3 j <= 12 i][j] <> None specified","( Disabled") = expandString( Immediate x y",\ : %1 %2"), propValue val = isType(real, < 0 x = -1 x = 1 B*100),100),-1) * x LOCAL ARRAY ansArray[][] theWeight = SelectedTextLines "ASYM_WID_ANSWERS" AnsArray[i][11] = notifyAfter FixupWeights ay[][] t][11] "FBNavBook" B"FBNavPage" t <> UpdateThisPage selLines, AnsArray[][] Hreference, pg LOCAL txt,txtSpec, clipSpec, waitFlag, StageRef, OSMsg, DestPg, DestBk y; pg = BlankThisPage i = ansArray[i][12] OKtxt = 0tem j ][12] <> i = stageRef = OKclip = i = 3] <> 3] <> 3] <> i = OKmsg = ][15] <> i = OKdestPg = ][2] <> i = OKdestBk = ][4] <> -- visual update here oldLock = lockScreen fldTxt = "FBPlayText" fldClip = "FBPlayClip" fldOsMsg = "FBSendMsg" fldNavPg = fldNavBk = ASYM_GetString(" blankThisPage = lightGray "FBNavBook" B"FBNavPage" t <> UpdateThisPage selLines, AnsArray[][] Hreference, pg LOCAL txt,txtSpec, clipSpec, waitFlag, StageRef, OSMsg, DestPg, DestBk y; pg = BlankThisPage i = ansArray[i][12] OKtxt = 0tem j ][12] <> i = stageRef = OKclip = i = 3] <> 3] <> 3] <> i = OKmsg = ][15] <> i = OKdestPg = ][2] <> i = OKdestBk = ][4] <> -- visual update here oldLock = lockScreen fldTxt = "FBPlayText" fldClip = "FBPlayClip" fldOsMsg = "FBSendMsg" fldNavPg = fldNavBk = ASYM_GetString(" blankThisPage = lightGray notifyBefore olastSel = oselectedTextLines AASYM_Reset LOCAL ARRAY fbArray[][] = ASYM_GetString("DelayedFeedbackForMultiObjects",\ "All Correct" &CRLF& " Incorrect" & Partially bg = ss = = ss; dimensions( ) = 0 initFBArray updateThisPage propValue SYSTEM {s_wid_targetObject -- -- " a dummy. o sets up the main used work fanswers bg = ASYM_Container( ss = = FALSE = ASYM_WID_SummaryFeedback bg = Hreference 1][1] = " 2][1] = " 3][1] = " /") = -- function returns a value; side effect, because you can't REAL weights {loc, isShift, isCtrl hitLine hitChar sel = > textlineCount( n = n = temp = n n = hitline ASYM_itemOffset( , sel) whatItem toggleAnchor blankThisPage UpdateThisPage updateCurrentAnswer i, newVal L = L][i] = setTextFeedback txt, option r 12, r 14, setMsgFeedback msgString r 15, setNavPage pgName, pgCaption setNavBook bookName 8", "") = "" WidgetHasElseAnswer -- This pseudo property /controls whether -- there should be >" answer -- The < > option used only Question widgets -- that have -ended Woptions. -- Not fTRUE/FALSE questions, example WidgetHasMultipleAnswers enable multiple answers )the same ASYM_reset oAnsArray SYSTEM s_wid_targetObject, s_wid_targetWindow LOCAL M[][] linkDLL "tb40dlg.dll" STRING ListToTextLine( = ASYM_WID_AnsArray dimensions( ) = 0 -- There was no ARRAY stored -- no defined. ansArray[1][1] = "< 0] = &1] = 0 -- Preset compatibility folder oautoAssignWeight = (ASYM_WID_AutoScoreWeight \ "ASYM_WID_Answers" pg = propsRead pg = readObjProps pg AllowMultipleAnswer fixupWeights autoSpread -- Match pairs don't incorrect/ value -- They are always " REAL TotalPositive WORD i, n, nCorrect CorrectList, IncorrectList n = i][10] = [i][11] istype( n > 0 totalPositive > 0 theWeight = 1 / n i][11] = :(1 / n) / i][11] i][11] = -- Get settings -- If a has a "propValue" -- use -- dialog {. Checked checkboxes can be %such. = NULL bg = y; pg = objs = getObjectList(pg," ,combobox", propType = oType = propName = " && #&& " " && pg = -- Where they differ {, change -- If a {. Unactivated bg = pg = t(pg," " && " && QUOTE proptype = " nam = h(propvalue) setString = " " && " && F && " " && & obj && " && " && && " " && " && " && && " " && tbk_wid_name = "ASYM_Q" ASYM_Reset "afterEdit" close = default Cancel numCorrect [i][10] numAnswers updateThisPage selLines, Hreference -- handled Hindividual blankThisPage buttonClick n = lockScreen ShowCurrentTab (n) notifyBefore o_currentTab /+ 1) sized sysPageUnitsPerPixel x1 = x1 - x1 x2 = x2 - x2 y1 = y1 - y1 y2 = y2 - y2 y = resizeTabs(1,x1,y1,x2,y2,xp,yp, m"hilite" = x1,y2,x1,y,x2-xp,y m"box grey" = x2-xp,y,x2-xp,y2-yp,x1+xp,y2-yp = x2,y,x2,y2,x1+xp,y2 c = c = 1 9" && c) = defBounds y; n = 1; n <= 3 tabRow = 1 btn = 9" && n) H0,-(yp * 2) Hxp*2 Hxp*2 Hyp*3 grp = Edge" newActiveRow,x1,y1,x2,y2,xp,yp,snap btnH = 315 -- magic Hxp*2 Hxp*2 currentRow = o_row toff = 3 cols = 2 ArrangeRow , x1,y1,x2,y2,xp,yp, y1 = y1 + ArrangeCheats x1,y1,x2,y2,xp,yp , x1,y1,x2,y2,xp,yp, , x1,y1,x2,y2,xp,yp, y1 = y1 + 1,x2,y2,xp,yp , x1,y1,x2,y2,xp,yp, y1 + , x1,y1,x2,y2,xp,yp, colSize = (x2-x1-xp*( -1)) / xoff = (colsize * (i-1)) + xp * (i-1) x1 + x1 + W, y1, , y1+ 9" && i+ resizeTabEdge ("tabEdge" && i+ arrangeCheats x1,y1,x2,y2,xp,yp yp2 = yp*2 U"cheat = x1,y1,x1,y1+ = x2,y1,x2,y1+ = x2-xp,y1,x2-xp,y1+ obj, bnds, x1 = x1 - x1 x2 = x2 - x2 y1 = y1 - y1 y2 = y2 - y2 xp2 = xp*2; = x2- $,y1, x1+ .,y1, x1,y1+yp2, x1,y2 = x2-xp,y1+ $x2-xp,y2 = x2-xp,y1+yp,x2,y1+ V+yp,x2,y2 notifyBefore olastSel = oselectedTextLines oenabled = QASYM_Reset LOCAL ARRAY ansArray[][] pg = pgName = showself = <> "general" *<> "delayed feedback" = showSelf oskipAllSpecifiedWarning opropValue = y--*** TEMP bg = lastItem = ss = = ss; r<> NULL; fixAnsArray; "multiSelect" "SingleSelect" ofieldType UpdateThisPage BlankThisPage selectedTextlines SYSTEM {s_wid_targetObject, s_wid_targetWindow -- y[][] -- " a dummy. sets up the main used work fanswers ss = = FALSE = ASYM_WID_AnsArray bg = ASYM_Container( dimensions( ) = 0 -- there was no stored fthat -- There nothing bg = n = i][10] = i][10] = TRUE; fixUpLine -- function returns a value; side effect, because you can't y[][] REAL weights xautoAssignWeight numAnswers = i][11] ASYM_isNumber( < 99 > 101 yesStr = ASYM_GetString("Yes") noStr = *The positive && "don't 100%. Redistribute automatically?")\ f"&" & "&" & fixupWeights addAnswer y[][] whatItem = dlgPage = dlgCB = comboBox "MatchSource" dlgCB2 = $Target" xprepDlgCB ( ) > 1 txt = "All named are already specified }were found on want type p?") f"&" & "&" & OK = ASYM_ShowDialog("subdialog"," "),"modal") isOpen close matchTarget = matchSource = ) + 1 ][17] = ][1] = ][10] = updateThisPage editAnswer y[][] ][17], " ][1]) OK = Edit ][17] = ][1] = ][10] = Hreference, deflt, excludeObjs V s_wid_TargetWindow, s_wid_TargetObject alreadyThere, DDItems useObjectType = myBg = exclusive = ( B"ASYM_WID_Exclusive" i][1] i][17] objList = sortList(getObjectList( whatName = (ASYM_itemOffset( ) = 0) ) = 0) dropDownItems ListToTextLine( deleteAnswer y[][], temp[][] selectedtextlines ) <> down Delete pair:") & CRLF & ][17] && "->" && ][1]\ f"&" & "&" & counter = 1 i <> I][j] = i][j] sel = y[][] (txt) i][1] = o, isShift, isCtrl y[][] lockScreen hitLine hitChar > textlineCount( hitline blankThisPage fixupLine a[][] src = a[L][17] tgt = a[L][1] '& TAB & "->" & default button author skrefFocus "8ASYM_PostMsg defBtn buttonClick keyDown .', " cancelBtn keyChar Cancel cancelBtn defBtn skrefFocus ASYM_IsWin31 enterPage skrefFocus setDefButton refBtn wordwrap button field skrefFocus pushbutton cancelBtn defBtn rkrefFocus notifybefore notifyBefore x = 13 odefBtn enabled ASYM_PostMsg "buttonClick", orefFocus notifyAfter ocancelBtn B"Cancel" B"OK" ASYM_IsWin31() u= "pushbutton" setDefButton btn wrd1 = NULL OK = ( fieldType wordwrap) targetWindow = orefBtn = u = sysPageUnitsPerPixel b = b - x, b - y, b + x, b + y YM_LogName Claude Ostyn Match Item - Question Properties MS Sans Serif 7:31:43 PM Mike Florence Asymetrix Corporation 12/14/95 9:09:33 PM <BookPath> info_LastSaved Mike Florence info_LastSavedBy Mike Florence 9/12/94 12:42:42 PM Mike Florence Mike Florence 9/30/94 5:11:12 PM MS Sans Serif Mike Florence Mike Florence Mike Florence Mike Florence Mike Florence 10/9/95 3:47:50 PM ASYM_AuthorResetPrompt 11/1/95 4:28:47 PM roperties Match Objects - Question Properties :HDMEDIAPATH Arial MS Sans Serif Sans Serif Sans Serif lastUnits frameUpdate lastUnits enterpage frameUpdate sysPageUnitsPerPixel <> lastUnits e = TRUE frameUpdate e= FALSE Group id 66 of Page id 1 of Book "D:\HOOKWORK\WIDGETS\MULTWID.TBK" rgetObject .'+ +F sortlist ASYM_WorkWindow s_wid_targetObject s_wid_targetWindow tb40dlg.dll enterBook 4s_wid_targetObject, s_wid_targetWindow X"tb40dlg.dll" sortlist( B = NULL N = ASYM_WorkWindow() 12/14/95 9:09:16 PM 10/18/95 7:48:56 PM ,&H.& propsRead ASYM_WorkWindow s_wid_targetObject widget1 readObjProps ASYM_WID_Answers s_wid_targetWindow default enterBook -- Resolution fixups prettier 3D graphics sysPageUnitsPerPixel <> lastUnits oldLock = e = TRUE frameUpdate 4s_wid_targetObject, s_wid_targetWindow = NULL ( = ASYM_WorkWindow() "ASYM_WID_Answers" [propsRead readObjProps /"widget1" = default Mike Florence 10/3/94 5:46:09 PM 10/18/95 7:44:45 PM erties INFO_Title Mike Florence ialog Feedback Text Page "clipChooser" d an Answer tch Item - Question Properties Add an Answer Page "general" ltiple Choice Question Properties SubDialog Match Objects - Question Properties Page "AddAnswer" Page id 13 Multiple Choice #1 Question Properties general 15,15 lastUnits FALSE dirtyBit propsRead 3dField tbk_wid_type propValue propValue ASYM_Reset keyChar propValue notifyBefore ASYM_Reset ) > 32 string propType TimeMax Maximum time (secs): TriesMax Maximum tries: Question Name: plain ASYM_Reset notifyBefore ASYM_Reset A "try" is counted every time delayed feedback or score is provided. This option is ignored if "Cannot change responses" is checked.....ed.ed" option is enabled.bled. Automatically Reset Question:::::: (unnamed) ASYM_reset notifyBefore ASYM_reset sized 3DGroupBox tbk_wid_type Automatically repairs itself when sized. ASYM_WID_Description Asymetrix ASYM_WID_Author 95-1-25 ASYM_WID_CreateDate Shadow Highlight Limits group caption Limits on interaction ASYM_WID_TimeMax ASYM_WID_TimeMax propValue maxFld ASYM_WID_TimeMax TimeMax propValue maxFld ASYM_WID_TimeMax TimeMax buttonclick propValue val = "ASYM_WID_TimeMax" isType(real, B*1000) mode = > 0)) maxFld = enabled i/1000)) buttonclick logical propType Limit time 3dField tbk_wid_type ASYM_WID_TimeMax ASYM_WID_TriesMax ASYM_WID_TriesMax propValue maxFld TriesMax ASYM_WID_TriesMax propValue maxFld TriesMax ASYM_WID_TriesMax buttonclick propValue val = "ASYM_WID_TriesMax" isType(real, mode = > 0)) maxFld = enabled buttonclick logical propType Limit tries 3dField tbk_wid_type ASYM_WID_TriesMax 3dField tbk_wid_type ASYM_WID_AutoReset choice ,enterPage,leavePage,always propValue ASYM_GetString When leaving the page Always enterPage choice When entering the page leavePage Never always propValue choice selectchange ASYM_Reset propValue ochoice ,always" = ASYM_GetString("Never") When entering the !leaving bAlways") odropDownItems = = TRUE oselectedItem = selectchange notifyBefore ASYM_Reset sized propType choice Neverseaving the pagee Never When entering the page When leaving the page Always Possible answers update UpdateThisPage oAnsArray update enterPage Possible answers: %1 Correct: %2 ASYM_GetString Possible x correct y update notifyAfter UpdateThisPage selLines, AnsArray[][] Hreference update notifyBefore LOCAL *WORD i, n, corr n = dimensions( ansArray[i][10] = TRUE = expandString(ASYM_GetString("Possible x correct y",\ answers: %1 Correct: %2"),\ n^2, Possible answers: 0 Correct: 000swer(s): 0 Possible answers update UpdateThisPage update enterPage ASYM_GetString Score this question x scoring Score this question: %1 ASYM_WID_IsScored 7wASYM_Container update notifyAfter UpdateThisPage selLines, AnsArray[][] Hreference update notifyBefore B"ASYM_WID_IsScored"\ "scoring" ASYM_Container( ASYM_GetString("Yes") = expandString( question x",\ : %1"), Score this question: NosCorrect: 0swer(s): 0 Possible answers Immediate Feedback: Enabled (None specified) Possible answers update UpdateThisPage update enterPage Delayed feedback: %1 d6FBArray None specified false Summary feedback x found ASYM_GetString Specified update notifyAfter UpdateThisPage selLines, FBArray[][] Hreference update notifyBefore LOCAL WORD i, j found = ss = n = dimensions( j >= 3 j <= 12 i][j] <> ASYM_GetString("Specified") !None specified") = expandString( Jummary feedback x",\ "Delayed : %1"), Delayed feedback: None specified 0swer(s): 0 ASYM_Reset enterPage UpdateThisPage Widget Editor 94080216070211604290110 ASYM_TpID selectedAnswer AllowMultipleAnswer ansArrayElse autoAssignWeight Correct Incorrect Partially Correct fbArray defaultButton Button id 81 of Background id 4 defBtn needFix Button id 81 of Background id 4 refBtn Button id 82 of Background id 4 cancelBtn Button id 81 of Background id 4 refFocus buttonClick buttonClick default cancel buttonclick buttonclick close escape Cancel delayed feedback feedback %ASYM_WinHelp answers scoring general buttonClick keyDown buttonClick pg = pg = "general" ( = 1000 pg = "answers" G = 1100 pg = "scoring" f = 1110 pg = "feedback" = 1120 pg = "delayed = 1130 <> NULL ASYM_WinHelp( notifyBefore 3dField tbk_wid_type 360,1740 defPos ASYM_WID_ANSWERS array propType numCorrect numAnswers selectedItems FALSE useObjectType FiveTabFolder _currentTab cheat grey cheat black cheat white hilite tabEdge 1 white black tabEdge 2 white black tabEdge 3 white black tabEdge 4 white black tabEdge 5 white black Current Tab Edge white black sized sized "mask" sysPageUnitsPerPixel x1 = x2 = y1 = y2 = xp2 = xp*2; yp2 = yp*2 = x2-xp,y1, x1+ 5,y1, x1,y1+ 6, x1,y2 U"grey" = x2-xp,y1+ _,x2-xp,y2 = x2-xp,y1+yp,x2,y1+ +yp,x2,y2 white black Tab 1 135,390,1975,705 defBounds &1 - General Tab 2 1990,390,3830,705 defBounds &2 - Answers Tab 3 3845,390,5685,705 defBounds &3 - Scoring Tab 4 135,75,2902.5,390 defBounds &4 - Immediate Feedback Tab 5 2917.5,75,5685,390 defBounds &5 - Delayed Feedback box grey box black keyDown enterPage author leavePage leaveBackground ASYM_Reset enterBackground keyChar Answers delete <else> UpdateThisPage fldAns ASYM_WID_ANSWERS Delete deleteAnswer clear UpdateThisPage selLines, AnsArray[][] Hreference LOCAL txt,txtSpec, clipSpec, waitFlag, StageRef i = --propValue B"isCorrect" = ansArray[i][10] = TRUE enabled B"delete" = fldAns = "ASYM_WID_ANSWERS" B"Delete" deleteAnswer 15,15 lastUnits FALSE dirtyBit propsRead count Add... ASYM_WID_ANSWERS EditAnswer buttonclick buttonclick EditAnswer "ASYM_WID_ANSWERS" FALSE count startTime Edit... Delete ASYM_WID_ANSWERS deleteAnswer buttonclick buttonclick deleteAnswer "ASYM_WID_ANSWERS" Delete ASYM_WID_AutoLockAnswer propValue propValue propValue propType Cannot change responses ASYM_WID_Exclusive false propValue propValue propValue propType Allow multiple responses to matching objects Possible answers update UpdateThisPage oAnsArray update enterPage Possible matches: %1 Possible matches x ASYM_GetString update notifyAfter UpdateThisPage selLines, AnsArray[][] Hreference update notifyBefore LOCAL *WORD i, n, corr n = dimensions( = expandString(ASYM_GetString("Possible matches x",\ : %1"), n) Possible matches: 1 Correct: 1swer(s): 0 (unnamed) ASYM_reset notifyBefore ASYM_reset sized 3DGroupBox tbk_wid_type Automatically repairs itself when sized. ASYM_WID_Description Asymetrix ASYM_WID_Author 95-1-25 ASYM_WID_CreateDate Shadow Highlight Answers group box caption Matching object names ASYM_WID_RejectWrong propValue propValue propValue logical propType Reject incorrect answers or unrecognized objects enterPage ASYM_reset enterPage UpdateThisPage Scoring propValue answerWeight UpdateThisPage UpdateThisPage selLines, AnsArray[][] Hreference i = ansArray[i][11] propValue "answerWeight" = FALSE dirtyBit 15,15 lastUnits false propsRead ASYM_WID_IsScored propValue MaxScore ASYM_WID_MaxScore ASYM_WID_RoundScore MinScore ASYM_WID_MinScore 7wASYM_Container propValue propValue buttonclick propValue pg = ASYM_Container( enabled "ASYM_WID_MaxScore" pg = pg = "ASYM_WID_MinScore" pg = pg = "ASYM_WID_RoundScore" pg = "scoring options box" pg = buttonclick logical propType Score this question maxScore Highest possible score: minScore Lowest possible score: Score weight of selected answer:r:: 3dField tbk_wid_type AnswerWeight propType ASYM_WID_AutoScoreWeight background 6/ASYMA_GetAuthorIni Widget Edit AutoWeight autoAssignWeight 7wASYM_Container propValue propValue n9ASYMA_SetAuthorIni Widget Edit AutoWeight background 8FixupWeights autoAssignWeight propValue 7wASYM_Container buttonClick background autoAssignWeight propValue 7wASYM_Container enterPage propValue = ASYMA_GetAuthorIni("Widget Edit","AutoWeight") autoAssignWeight ASYM_Container( /") = notifyBefore OK ASYMA_SetAuthorIni(" buttonClick FixupWeights Boolean propType Automatic 3dField tbk_wid_type ASYM_WID_MinScore RoundToMin ASYM_ExpandString Report the lowest score: %1 ASYM_GetString 7wASYM_Container propValue propValue propValue propValue leaveField propValue xisType(real, B"RoundToMin" ASYM_Container( ")= \ ASYM_ExpandString(ASYM_GetString(\ "Report the lowest score: %1"),\ propType 3dField tbk_wid_type ASYM_WID_MaxScore ASYM_ExpandString Report the highest score: %1 ASYM_GetString RoundToMax 7wASYM_Container propValue propValue propValue propValue leaveField propValue xisType(real, B"RoundToMax" ASYM_Container( ")= \ ASYM_ExpandString(ASYM_GetString(\ "Report the highest score: %1"),\ propType ASYM_WID_RoundScore ,&H.& Button roundToMin noRounding roundToMax propValue ,&H.& Button noRounding propValue propValue "roundToMax" "roundToMin" "noRounding" objs = BUTTON Zdefault STRING propType RoundScore Prompt For a partially correct response: NoRounding Use the weight assigned to each possible answer to xtra 1 compute an exact score RoundToMin Report the lowest score: 0 RoundToMax Report the highest score: 1 Possible answers update UpdateThisPage oAnsArray update enterPage Possible answers: %1 ASYM_GetString Correct answers: %2 Possible x correct y update notifyAfter UpdateThisPage selLines, AnsArray[][] Hreference update notifyBefore LOCAL *WORD i, n, corr n = dimensions( ansArray[i][10] = TRUE = expandString(ASYM_GetString("Possible x correct y",\ answers: %1" & CRLF & "Correct 2"),\ n, Possible answers: 0 Correct answers: 0s): 0 (unnamed) ASYM_reset notifyBefore ASYM_reset sized 3DGroupBox tbk_wid_type Automatically repairs itself when sized. ASYM_WID_Description Asymetrix ASYM_WID_Author 95-1-25 ASYM_WID_CreateDate Shadow Highlight Caption Possible answers enterPage ASYM_reset 8Z,Ps FixupWeights UpdateThisPage feedback 15,15 lastUnits dirtyBit false propsRead showImmediate IsImmediateFB false IsDetailedFB ASYM_WID_DelayFeedback propValue update propValue update enterPage update buttonClick ASYM_WID_Answers Immediate Feedback Options 7wASYM_Container update ASYM_WID_Answers leavePage false propValue asym_reset propValue update notifyBefore buttonClick isEnable = myPg = ASYM_Container( enabled "Immediate Feedback Options" "ASYM_WID_Answers" notifyAfter asym_reset propType Enable feedback at time of response Immediate Feedback Options (unnamed) ASYM_reset notifyBefore ASYM_reset sized 3DGroupBox tbk_wid_type Automatically repairs itself when sized. ASYM_WID_Description Asymetrix ASYM_WID_Author 95-1-25 ASYM_WID_CreateDate Shadow Highlight Possible answers group Possible answers ASYM_WID_ANSWERS HsupdateThisPage oansArray buttonClick buttonClick LOCAL ARRAY ansArray[][] theList bg = ss = dimensions( selectedTextLines "ASYM_WID_ANSWERS" bg = updateThisPage Select All Send OpenScript: fbtextprompt Feedback text: Go to page: Of book: fbclipprompt Play media clip: FBNavBook propType FBPlayClip FBSendMsg FBNavPage FBPlayText EditFeedbackButtons ansFld d6fbArray ASYM_WID_ANSWERS false s_wid_targetObject NavPage Feedback selLines OSMsg HsUpdateThisPage ASYM_WID_SummaryFeedbackList _ASYMA_EditFeedback oansArray oansArray e6fbArray hyperlink buttonClick buttonClick loc SYSTEM s_wid_targetObject LOCAL ansArray[][] "Feedback" ansFld = "ASYM_WID_ANSWERS" fb = "ASYM_WID_SummaryFeedbackList" = fbArray fb = selLines = selectedtextlines NULL c"clip" c"Msg" "OSMsg" c"NavPage" "hyperlink" _ASYMA_EditFeedback( UpdateThisPage FBPlayClip Click to select file helpText exclude FBPlayText Click to select file helpText exclude FBSendMsg Click to select file helpText exclude FBNavPage Click to select file helpText exclude when a correct match is made asym_reset enterPage leavePage Delayed Feedback false propsRead FALSE IsDetailedFB 3dField tbk_wid_type ASYM_WID_SummaryFeedbackList array propType numCorrect numAnswers selectedItems useObjectType All Correct All Incorrect Partially Correct Feedback to execute on request when the responses are...e, and the responses are...ay its fPlaeedback, and the responses are... one or more): (unnamed) ASYM_reset notifyBefore ASYM_reset sized 3DGroupBox tbk_wid_type Automatically repairs itself when sized. ASYM_WID_Description Asymetrix ASYM_WID_Author 95-1-25 ASYM_WID_CreateDate Shadow Highlight Question feedback group Caption Question feedback Send OpenScript: fbtextprompt Feedback text: Go to page: Of book: fbclipprompt Play media clip: FBNavBook propType FBPlayClip FBSendMsg FBNavPage FBPlayText EditFeedbackButtons ansFld d6fbArray ASYM_WID_ANSWERS false s_wid_targetObject NavPage Feedback selLines OSMsg HsUpdateThisPage ASYM_WID_SummaryFeedbackList _ASYMA_EditFeedback oansArray oansArray e6fbArray hyperlink buttonClick buttonClick loc SYSTEM s_wid_targetObject LOCAL ansArray[][] "Feedback" ansFld = "ASYM_WID_ANSWERS" fb = "ASYM_WID_SummaryFeedbackList" = fbArray fb = selLines = selectedtextlines NULL c"clip" c"Msg" "OSMsg" c"NavPage" "hyperlink" _ASYMA_EditFeedback( UpdateThisPage FBPlayClip Click to select file helpText exclude FBPlayText Click to select file helpText exclude FBSendMsg Click to select file helpText exclude FBNavPage Click to select file helpText exclude leavePage leaveBackground ASYM_Reset enterPage enterBackground addAnswer nxkeyChar xkeyChar xkeyChar x x = 27 close 15,15 lastUnits Select or enter the name of the target object: Select or enter the name of the source object (cannot be a group):he source. 3dField tbk_wid_type MatchSource ASYM_Reset firstIdle notifyBefore ASYM_Reset odropDownItems 2firstIdle string propType 3dField tbk_wid_type MatchTarget ASYM_Reset ,&H.& matchSource enterPage update keyChar update selectChange matchSource update notifyBefore ASYM_Reset odropDownItems cb = comboBox "matchSource" txt = update selectChange cb = enabled B"OK" /= TRUE string propType ASYM_Reset firstIdle enterPage dialogs CANCEL button "CANCEL" of xkeyDown field single button "OK" of syscuror default xkeyDown -- generic dialog handler -- test Bexits so, does action xkeyDown isObject(" B""CANCEL"" buttonclick syscuror = default u = keyEnter B""OK"" = NULL "single" fieldType B"OK" 94080216150514626234020 ASYM_TpID defaultButton Button id 4 of Background id 2 defBtn needFix Button id 5 of Background id 2 refBtn Button id 5 of Background id 2 cancelBtn ComboBox id 34 of Page id 9 refFocus buttonClick update firstIdle update selectChange matchTarget 7wASYM_Container matchSource update buttonClick notifyAfter firstIdle update selectChange pg = ASYM_Container( tCB1 = comboBox "matchSource" tCB2 = Target" oenabled = default cancel buttonClick buttonClick close escape Cancel addAnswer FBPlayText %ASYM_WinHelp FBSendMsg buttonclick keyDown buttonclick = "FBPlayText" ASYM_WinHelp(1030,"") = "FBSendMsg" /40,"") = "addAnswer" T50,"") notifyBefore keyDown author enterPage firstIdle selectChange keyChar Delayed Feedback Answers xAnswers feedback xfeedback general xgeneral Scoring addAnswer Widget Editor dialogs widget1